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COMPONENT ThrottleAgent 
BEGIN 

EUManager— >RegIsterThrottleAgent(): 
While (EUManager->lsThrottlingRequired()) 
BEGIN 

EUList=EUManager->GetListOfEUs(self); 
ThrottlingLevels=EUManager->GetThrottlingLevel(EUList); 
...apply ThrottlingLevel to EUs In EUList.... 
END 

EUManager— >DeregfsterThrottleAgent() ; 
END 
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COMPONENT EU 
BEGIN 

...Initialization... 

EUManager— >RegisterEU(...args...); 

While(NOT Done) 
BEGIN 

...Do Sonne work... 

ThrottlingLevel=EUManager->GetThrottlingLevel(self): 

Th rotti e (Th rott li n g Leve I ) ; 

END 

...Termination... 
EUManager— >DeRegisterEU(); 
END 
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FUNCTION UtilityO 
BEGIN 

WHILE (NOT done) 
BEGIN 

...do some work... 
Throttle If Needed() 

END 

END 



(a) Inserting SIS point 



FUNCTION Throttle If Needed() 
BEGIN 

(workTime, sleepTime) = GetThrottlingLevel() ; 
timeWorked = Now() — workStart ; 
IF (timeWorked > workTime) 

SLEEP ( sleepTime ) ; 

workStart = Now() ; 
ENDIF 

END 



(b) SIS implementation 



FIG. 1 1 
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